unit BaseFormUnit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, JvComponentBase, JvDockControlForm;

type
  TBaseForm = class(TForm)
    JvDockClient1: TJvDockClient;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  BaseForm: TBaseForm;

implementation

uses
  MainFormUnit;
{$R *.dfm}

procedure TBaseForm.FormCreate(Sender: TObject);
begin
  Self.DoubleBuffered := true;
end;

end.

